home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ Win2K Shutdown 1.xpl < prev    next >
Text File  |  2002-11-02  |  2KB  |  44 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH 1"="Startup/Shutdown\Shutdown\Windows NT/2K/XP\05) Shutdown Logging"
  5. "NAME"="Windows Verbose Shutdown Messages"
  6. "OSVERSION"="0001"
  7. "VERSION"="1.00"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Enable Verbose Shutdown Messages"
  10. "DESCRIPTION 1"="When there are problems with the shutdown or the logoff procedure, Windows is able to log anything that is happing through logoff or shutdown in verbose mode."
  11. "DESCRIPTION 2"="If this mode is activated, you will find detailed messages inside the event log (eventvwr.exe)."
  12. "DESCRIPTION 3"="Please note: This setting affects all users on this computer."
  13. "AUTHOR"="Xteq Systems"
  14. "CONTACTURL"="http://www.xteq.com"
  15. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  16. "COMMENT 1"="see http://support.microsoft.com/default.aspx?scid=kb;en-us;Q316243"
  17.  
  18.  
  19. sV1="HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\verbosestatus"
  20. sV2="HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System\DisableStatusMessages"
  21.  
  22.  
  23. Sub Plugin_Initialize 
  24.  i=RegReadValue(sV1)
  25.  if i=1 then SetUIElement 1,true
  26. End Sub
  27.  
  28. Sub Plugin_CheckData(ElementIndex)
  29. End Sub
  30.  
  31. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  32.  if GetUIElement(1)=true then
  33.     Call RegWriteValue(sV1,1,2)
  34.     If RegValueExists(sV2) then Call RegDeleteValue(sV2)
  35.  else
  36.     If RegValueExists(sV1) then Call RegDeleteValue(sV1)    
  37.  end if 
  38.  
  39.  Call Restart()
  40. End Sub
  41.  
  42. Sub Plugin_Terminate 
  43. End Sub
  44.